home *** CD-ROM | disk | FTP | other *** search
/ Windows Game Programming for Dummies (2nd Edition) / WinGamProgFD.iso / mac / DirectX SDK / DXSDK / samples / Multimedia / VBSamples / DirectSound / Play3DSound / frm3DAlg.frm next >
Text File  |  2001-10-08  |  3KB  |  88 lines
  1. VERSION 5.00
  2. Begin VB.Form frm3DAlg 
  3.    BorderStyle     =   4  'Fixed ToolWindow
  4.    Caption         =   "Select 3D Algorithm"
  5.    ClientHeight    =   1755
  6.    ClientLeft      =   45
  7.    ClientTop       =   285
  8.    ClientWidth     =   5700
  9.    LinkTopic       =   "Form1"
  10.    MaxButton       =   0   'False
  11.    MinButton       =   0   'False
  12.    ScaleHeight     =   1755
  13.    ScaleWidth      =   5700
  14.    ShowInTaskbar   =   0   'False
  15.    StartUpPosition =   1  'CenterOwner
  16.    Begin VB.CommandButton cmdOK 
  17.       Caption         =   "OK"
  18.       Default         =   -1  'True
  19.       Height          =   315
  20.       Left            =   3660
  21.       TabIndex        =   4
  22.       Top             =   1320
  23.       Width           =   915
  24.    End
  25.    Begin VB.CommandButton cmdCancel 
  26.       Cancel          =   -1  'True
  27.       Caption         =   "Cancel"
  28.       Height          =   315
  29.       Left            =   4620
  30.       TabIndex        =   3
  31.       Top             =   1320
  32.       Width           =   915
  33.    End
  34.    Begin VB.OptionButton optHalf 
  35.       Caption         =   "&Light Quality (WDM Only.  Good quality 3D effect, uses less CPU)"
  36.       Height          =   255
  37.       Left            =   60
  38.       TabIndex        =   2
  39.       Top             =   840
  40.       Width           =   5415
  41.    End
  42.    Begin VB.OptionButton optFull 
  43.       Caption         =   "&High Quality (WDM Only.  Highest quality 3D effect, but uses more CPU)"
  44.       Height          =   255
  45.       Left            =   60
  46.       TabIndex        =   1
  47.       Top             =   480
  48.       Width           =   5415
  49.    End
  50.    Begin VB.OptionButton optNone 
  51.       Caption         =   "&No Virtualization (WDM or VxD - CPU efficient, but basic 3D effect)"
  52.       Height          =   255
  53.       Left            =   60
  54.       TabIndex        =   0
  55.       Top             =   120
  56.       Value           =   -1  'True
  57.       Width           =   5415
  58.    End
  59. End
  60. Attribute VB_Name = "frm3DAlg"
  61. Attribute VB_GlobalNameSpace = False
  62. Attribute VB_Creatable = False
  63. Attribute VB_PredeclaredId = True
  64. Attribute VB_Exposed = False
  65. Option Explicit
  66. '''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
  67. '
  68. '  Copyright (C) 1999-2001 Microsoft Corporation.  All Rights Reserved.
  69. '
  70. '  File:       frm3DAlg.frm
  71. '
  72. '''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
  73. Private mfOkHit As Boolean
  74.  
  75. Private Sub cmdCancel_Click()
  76.     mfOkHit = False
  77.     Unload Me
  78. End Sub
  79.  
  80. Private Sub cmdOK_Click()
  81.     mfOkHit = True
  82.     Unload Me
  83. End Sub
  84.  
  85. Public Property Get OKHit() As Boolean
  86.     OKHit = mfOkHit
  87. End Property
  88.